home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Development Platforms / Apple II / Essentials / MPW IIGS Interfaces / PIIGSIncludes / Video.p < prev    next >
Encoding:
Text File  |  1990-04-03  |  3.1 KB  |  118 lines  |  [TEXT/MPS ]
  1. {********************************************
  2. ; File: Video.p
  3. ;
  4. ;
  5. ; Copyright Apple Computer, Inc. 1986-90
  6. ; All Rights Reserved
  7. ;
  8. ********************************************}
  9.  
  10. UNIT VIDEO;
  11. INTERFACE
  12. USES TYPES;
  13. CONST
  14.  
  15. vdVideoOverlay = $01;
  16. vdFrameGrabber = $02;
  17. vdInVStandards = $03;
  18. vdOutVStandards = $04;
  19. vdKeyDissLevels = $05;
  20. vdNKeyDissLevels = $06;
  21. vdAdjSideEffect = $07;
  22. vdKeyColorBits = $08;
  23. vdInHueAdj = $09;
  24. vdInSatAdj = $0A;
  25. vdInContrastAdj = $0B;
  26. vdInBrightAdj = $0C;
  27. vdOutSetup = $0D;
  28. vdOutChromaFltr = $0E;
  29. vdOutExtBlank = $0F;
  30. vdKeyEnhDiss = $10;
  31. vdLineInterrupt = $11;
  32. vdGGBus = $12;
  33. vdDualOut = $13;
  34. vdTextMonoOver = $14;
  35. vdGenlock = $32;
  36. vdVideoDetect = $33;
  37. vdGenlocked = $34;
  38. vdAdjInc = $50;
  39. vdAdjDec = $51;
  40. vdAdjSave = $52;
  41. vdAvail = $01;
  42. vdNotAvail = $00;
  43. vdYes = $01;
  44. vdNo = $00;
  45. vdOn = $01;
  46. vdOff = $00;
  47. vdNil = $00;
  48. vdFalse = $00;
  49. vdTrue = $01;
  50. vdKColorEnable = $64;
  51. vdVerticalBlank = $82;
  52. vdMainPageLin = $C8;
  53. vdRAMPageSel = $C9;
  54. vdVBLInterrupt = $CA;
  55. vdInterlaceMode = $CB;
  56. vdClearVBLInt = $CC;
  57. vdClearLineInt = $CD;
  58. vdDisplayField = $CE;
  59. vdVBLIntRequest = $CF;
  60. vdLineIntRequest = $D0;
  61. vdNone = $00;
  62. vdNTSC = $01;
  63. vdPAL = $02;
  64. vdSECAM = $04;
  65. vdSNTSC = $08;
  66. vdSPAL = $10;
  67. vdSSECAM = $20;
  68. vdRGB60 = $40;
  69. vdRGB50 = $80;
  70. vdAux = $00;
  71. vdMain = $10;
  72. vdInterlace = $30;
  73. vdField1 = $01;
  74. vdField0 = $00;
  75. vdEnable = $01;
  76. vdDisable = $00;
  77. vdExternal = $00;
  78. vdGraphics = $01;
  79. vdVBlank = $01;
  80. vdActiveVideo = $00;
  81.  
  82. { Error Codes }
  83. vdNoVideoDevice = $2110;  { no video device was found }
  84. vdAlreadyStarted = $2111;  { Video tool set already started }
  85. vdInvalidSelector = $2112;  { an invalid selector was specified }
  86. vdInvalidParam = $2113;  { an invalid parameter was specified }
  87. vdUnImplemented = $21FF;  { an unimplemented tool set routine was called }
  88. PROCEDURE VDBootInit   ;
  89. FUNCTION VDGetFeatures ( videoSelector:Integer) : Integer ;
  90. PROCEDURE VDGGControl ( videoSelector:Integer; gGCtlValue:Integer)  ;
  91. FUNCTION VDGGStatus ( videoSelector:Integer) : Integer ;
  92. PROCEDURE VDInControl ( videoSelector:Integer; inputCtlValue:Integer)  ;
  93. PROCEDURE VDInConvAdj ( videoSelector:Integer; adjustFunction:Integer)  ;
  94. FUNCTION VDInGetStd  : Integer ;
  95. PROCEDURE VDInSetStd ( inputStandard:Integer)  ;
  96. FUNCTION VDInStatus ( videoSelector:Integer) : Integer ;
  97. PROCEDURE VDKeyControl ( videoSelector:Integer; keyerCtlValue:Integer)  ;
  98. FUNCTION VDKeyGetKBCol  : Integer ;
  99. FUNCTION VDKeyGetKDiss  : Integer ;
  100. FUNCTION VDKeyGetKGCol  : Integer ;
  101. FUNCTION VDKeyGetKRCol  : Integer ;
  102. FUNCTION VDKeyGetNKDiss  : Integer ;
  103. PROCEDURE VDKeySetKCol ( redValue:Integer; greenValue:Integer; blueValue:Integer)  ;
  104. PROCEDURE VDKeySetKDiss ( kDissolve:Integer)  ;
  105. PROCEDURE VDKeySetNKDiss ( nonKeyDissolve:Integer)  ;
  106. FUNCTION VDKeyStatus ( videoSelector:Integer) : Integer ;
  107. PROCEDURE VDOutControl ( videoSelector:Integer; outCtlValue:Integer)  ;
  108. FUNCTION VDOutGetStd  : Integer ;
  109. PROCEDURE VDOutSetStd ( outStandard:Integer)  ;
  110. FUNCTION VDOutStatus ( videoSelector:Integer) : Integer ;
  111. PROCEDURE VDReset   ;
  112. PROCEDURE VDShutDown   ;
  113. PROCEDURE VDStartUp   ;
  114. FUNCTION VDStatus  : Boolean ;
  115. FUNCTION VDVersion  : Integer ;
  116. IMPLEMENTATION
  117. END.
  118.